home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Apple II Magazines (PO)
/
Nibble Volume 11, No. 03 (1990-03)(MindCraft Publishing)(Side A).zip
/
Nibble Volume 11, No. 03 (1990-03)(MindCraft Publishing)(Side A).po
/
INVERSE.bas
< prev
next >
Wrap
BASIC Source File
|
1996-12-24
|
589b
|
17 lines
5 HOME
10 REM ****************************
20 REM * INVERSE *
30 REM * BY DAVID THOMAS MUELLER *
40 REM * COPYRIGHT(C) 1990 *
50 REM * MINDCRAFT PUBL. CORP. *
60 REM * CONCORD, MA. 01742 *
70 REM ****************************
80 REM ARC-SINE
90 S = .866024962
100 C = SQR(1 -S ^2)
110 AA = ATN(S/C) *57.2957795: REM FOR C > 0
120 PRINT "THE ARC-SINE OF "S: PRINT "IS "AA" DEGREES": PRINT
130 C = .5
140 S = SQR(1 -C ^2)
150 AA = ATN(S/C) *57.2957795: REM FOR C > 0
160 PRINT "THE ARC-COSINE OF "C: PRINT "IS "AA" DEGREES"